Fortran 指针参与赋值和运算

简单来说：当指针出现在变量应该出现的位置时，它就自动等价于变量。

应用：交换大型数组

real, dimension(100, 100), target :: a1, a2
real, dimension(:,:), pointer :: p1, p2, temp

p1 => a1
p2 => a2
temp => p1
p1 => p2
p2 => temp